#ifndef __FORMAT__
#define __FORMAT__
#include "level.hpp"
#include "message.hpp"
#include <memory>
#include <vector>
#include <tuple>

namespace bitlog
{
    class FormatItem
    {
    public:
        using ptr = std::shared_ptr<FormatItem>;
        virtual void format(std::ostream& os,const LogMsg& msg) = 0;
    };

    class MsgFormatItem:public FormatItem
    {
    public:
        MsgFormatItem(const std::string& str = "")
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << msg._payload;
        }
    };
    class LevelFormatItem:public FormatItem
    {
    public:
        LevelFormatItem(const std::string& str = "")
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << LogLeval::toString(msg._level);
        }
    };
    class NameFormatItem:public FormatItem
    {
    public:
        NameFormatItem(const std::string& str = "")
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << msg._name;
        }
    };
    class TimeFormatItem:public FormatItem
    {
    public:
        TimeFormatItem(const std::string& format = "%H:%M:%S")
        :_format(format)
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            time_t t = msg._ctime;
            struct tm it;
            localtime_r(&t,&it);
            char tmp[128] = {0};
            strftime(tmp,127,_format.c_str(),&it);
        }
    private:
        std::string _format;
    };

    class CFileFormatItem:public FormatItem
    {
    public:
        CFileFormatItem(const std::string& str = "")
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << msg._file;
        }
    };
    class ThreadFormatItem:public FormatItem
    {
    public:
        ThreadFormatItem(const std::string& str = "")
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << msg._tid;
        }
    };
    class TabFormatItem:public FormatItem
    {
    public:
        TabFormatItem(const std::string& str = "")
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << "\t";
        }
    };
    class CLineFormatItem:public FormatItem
    {
    public:
        CLineFormatItem(const std::string& str = "")
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << msg._line;
        }
    };
    class TabFormatItem:public FormatItem
    {
    public:
        TabFormatItem(const std::string& str = "")
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << "\t";
        }
    };
    class NLineFormatItem:public FormatItem
    {
    public:
        NLineFormatItem(const std::string& str = "")
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << "\n";
        }
    };
    class OtherFormatItem:public FormatItem
    {
    public:
        OtherFormatItem(const std::string& str = "")
        :_str(str)
        {}
        virtual void format(std::ostream& os,const LogMsg& msg)
        {
            os << _str;
        }
    private:
        std::string _str;
    };


    class Formatter
    {
    public:
        using ptr = std::shared_ptr<FormatItem>;
        Formatter(const std::string& pattern = "[%d{%H:%M:%S}][%t][%p][%c][%f:%l] %m%n")
        :_pattern(pattern)
        {
        }
        FormatItem::ptr createItem(const std::string& fc,const std::string& subfmt)
        {
            if(fc == "m") return FormatItem::ptr(new MsgFormatItem(subfmt));
            if(fc == "p") return FormatItem::ptr(new LevelFormatItem(subfmt));
            if(fc == "c") return FormatItem::ptr(new NameFormatItem(subfmt));
            if(fc == "t") return FormatItem::ptr(new ThreadFormatItem(subfmt));
            if(fc == "n") return FormatItem::ptr(new NLineFormatItem(subfmt));
            if(fc == "d") return FormatItem::ptr(new TimeFormatItem(subfmt));
            if(fc == "f") return FormatItem::ptr(new CFileFormatItem(subfmt));
            if(fc == "l") return FormatItem::ptr(new CLineFormatItem(subfmt));
            if(fc == "T") return FormatItem::ptr(new TabFormatItem(subfmt));
        }
        bool ParsePattern()
        {
            std::vector<std::tuple<std::string,std::string,int>> array;
            std::string format_key;
            std::string format_val;
            std::string string_row;
            bool sub_format_error = false;
            int pos = 0;
            while(pos < _pattern.size())
            {
                if(_pattern[pos] != '%')
                {
                    string_row.append(1,_pattern[pos]);
                    pos += 1;
                    continue;
                }
                if(pos + 1 < _pattern.size() && _pattern[pos+1] == '%')
                {
                    //双%的情况
                    string_row.append(1,'%');
                    pos += 2;
                    continue;
                }
                if(string_row.empty() == false)
                {
                    array.push_back(std::make_tuple(string_row,"",0));
                    string_row.clear();
                }
                //pos当前位置是：%
                pos += 1;
                if(pos < _pattern.size() && _pattern[pos] == '{')
                {
                    sub_format_error = true;
                    pos += 1;
                    while(pos < _pattern.size())
                    {
                        if(_pattern[pos] == '}')
                        {
                            sub_format_error = false;
                            pos += 1;
                            break;
                        }
                        format_val.append(1,_pattern[pos]);
                        pos += 1;
                    }
                }
                array.push_back(std::make_tuple(format_key,format_val,1));
                format_key.clear();
                format_val.clear();
            }
            if(sub_format_error)
            {
                std::cout << "{}对应出错" << std::endl;
                return false;
            }
            if(string_row.empty() == false)
            {
                array.push_back(std::make_tuple(string_row,"",0));
            }
            if(format_key.empty() == false)
            {
                array.push_back(std::make_tuple(format_key,format_val,1));
            }
            for(auto& it : array)
            {
                if(std::get<2>(it) == 0)
                {
                    FormatItem::ptr fi(new OtherFormatItem(std::get<0>(it)));
                    _items.push_back(fi);
                }
                else
                {
                    FormatItem::ptr fi = createItem(std::get<0>(it),std::get<1>(it));
                    if(fi.get() == nullptr)
                    {
                        std::cout << "没有对应的格式化字符：%" << std::get<0>(it) << std::endl;
                        return false;
                    }
                    _items.pop_back(fi);
                }
            }
            return true;
        }
    private:
        std::string _pattern;
        std::vector<FormatItem::ptr> _items;
    };
}

#endif